Imports System.Drawing
Imports DotSpatial.Topology
Imports Point = DotSpatial.Topology.Point

Public Class Tile
    Public Sub New(x__1 As Integer, y__2 As Integer, zoomLevel__3 As Integer, envelope__4 As Envelope, bitmap__5 As Bitmap)
        X = x__1
        Y = y__2
        ZoomLevel = zoomLevel__3
        Envelope = envelope__4
        Bitmap = bitmap__5
    End Sub

#Region "Properties"

    Public Property X() As Integer
        Get
            Return m_X
        End Get
        Set(value As Integer)
            m_X = Value
        End Set
    End Property
    Private m_X As Integer

    Public Property Y() As Integer
        Get
            Return m_Y
        End Get
        Set(value As Integer)
            m_Y = Value
        End Set
    End Property
    Private m_Y As Integer

    Public Property ZoomLevel() As Integer
        Get
            Return m_ZoomLevel
        End Get
        Set(value As Integer)
            m_ZoomLevel = Value
        End Set
    End Property
    Private m_ZoomLevel As Integer

    Public Property Envelope() As Envelope
        Get
            Return m_Envelope
        End Get
        Set(value As Envelope)
            m_Envelope = Value
        End Set
    End Property
    Private m_Envelope As Envelope

    Public Property Bitmap() As Bitmap
        Get
            Return m_Bitmap
        End Get
        Set(value As Bitmap)
            m_Bitmap = Value
        End Set
    End Property
    Private m_Bitmap As Bitmap

    Public ReadOnly Property TileXY() As Point
        Get
            Return New Point(X, Y)
        End Get
    End Property

#End Region
End Class
